100 REM *** MOVE-DEMO ***
110 REM *** WINDOWING ***
120 :
130 PRINT CHR$(147)
140 FOR I=1 TO 20
150 : PRINT "DIES IST EIN TEST"
160 NEXT
170 :
180 SYS 49152,1024,50000,1000
190 :
200 PRINT CHR$(19)
210 PRINT:PRINT:PRINT
220 PRINT TAB(10)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
230 PRINT TAB(10)"[194] DIESES WINDOW   [194]"
240 PRINT TAB(10)"[194] VERSCHWINDET,   [194]"
250 PRINT TAB(10)"[194] WENN SIE EINE   [194]"
260 PRINT TAB(10)"[194] TASTE DRUECKEN  [194]"
270 PRINT TAB(10)"[194] UND WIRD DURCH  [194]"
280 PRINT TAB(10)"[194] DEN ALTEN BILD- [194]"
290 PRINT TAB(10)"[194] SCHIRMINHALT    [194]"
300 PRINT TAB(10)"[194] ERSETZT         [194]"
310 PRINT TAB(10)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
320 :
330 GET A$:IF A$="" THEN 330
340 SYS 49152,50000,1024,1000
350 GET A$:IF A$="" THEN 350